home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / Helpfile / _viClose.au3 < prev    next >
Text File  |  2006-06-17  |  1KB  |  27 lines
  1. ;- This assumes that you have instrument set to GPIB address 1
  2. ; It shows how to use the _viExecCommand function in stand alone mode and combined
  3. ; with _viOpen and _viClose.
  4. ; It also shows the _viGTL function
  5.  
  6. #include <Visa.au3>
  7.  
  8. Dim $h_session = 0
  9.  
  10. ; Query the ID of the instrument in GPIB address 3
  11. MsgBox(0,"Step 1","Open the instrument connection with _viOpen")
  12. Dim $h_instr = _viOpen("GPIB::3::0")
  13. MsgBox(0,"Instrument Handle obtained", "$h_instr = " & $h_instr) ; Show the Session Handle
  14. ; Query the instrument
  15.  
  16. MsgBox(0,"Step 2","Query the instrument using the VISA instrument handle")
  17. $s_answer = _viExecCommand($h_instr,"*IDN?") ; $h_instr is NOT A STRING now!
  18. MsgBox(0,"GPIB QUERY result",$s_answer) ; Show the answer
  19. ; Query again. There is no need to OPEN the link again
  20.  
  21. MsgBox(0,"Step 3","Query again. There is no need to OPEN the link again")
  22. $s_answer = _viExecCommand($h_instr,"*IDN?")
  23. MsgBox(0,"GPIB QUERY result",$s_answer) ; Show the answer
  24.  
  25. MsgBox(0,"Step 4","Close the instrument connection using _viClose")
  26. _viClose($h_instr) ; Close the instrument connection
  27.